CAAAberration_EarthVelocity <-
function(JD){
.Call("CAAAberration_EarthVelocity", JD)
}
